perm filename SEGCOM.AUX[SYS,HE] blob sn#009320 filedate 1972-12-06 generic text, type T, neo UTF8
COMMENT ⊗   VALID 00002 PAGES 
RECORD PAGE   DESCRIPTION
 00001 00001
 00002 00002	EXTERNAL DECLARATIONS
 00004 ENDMK
⊗;
COMMENT EXTERNAL DECLARATIONS;

ERP	SQRT(REAL X);
ERP	ATAN(REAL X);
ERP	ACOS(REAL X);

EXTERNAL ITEMVAR
	T_STEM,TMPATR,ITEM1,ITEMN,
	IMATCH,NMATCH,OMATCH,MATCH,BMATCH,CMATCH,MATCH2,
	NFLAVOR,
	TPAIR,GRAPH,NODE,LINK,S,BACK,REASON,EXTERIOR,
	F1,F,BB1,BB2,LX,E1,E2,R,R1,R2,L,L1,L2,L3,L4,C,B1,B2;
EXTERNAL INTEGER ITEMVAR LPAIR,NEWR,NEWL,NEWP,NEWF,NEWB;
EXTERNAL SET ITEMVAR SIV,X,Y,Z;
EXTERNAL SAFE REAL ARRAY ITEMVAR U,V,W,PX,P,P1,P2,P3,P4,XX,YY,B,P5;

EXTERNAL STRING STR;
EXTERNAL SAFE REAL ARRAY
	FOURBY4[1:4,1:4],SIZE4[1:4],SIZE7[1:7];
EXTERNAL INTEGER I,J,K,IFLAG,ERRFLAG,X1,X2,Y1,Y2,BBADLCNT,
	ADCOR1,ADCOR2;
EXTERNAL BOOLEAN BOOL,DEBUG2;
EXTERNAL SET
	AROOUT,DOUBLE,SHAFTS,TTOPS,KTOPS,TSTEMS,SOP,PRSET,
	S1,S2,S3,S4,S5,SX,NEWPOINTS,
	P_SET,NO_CLASS;
EXTERNAL SAFE INTEGER ARRAY MERGED[0:4];